00100 QQQ 00200 CLAR 0 10; 00300 P2 RHY/16 X 10/4. 6/3/12//6/3/6//12 X 12*; 00400 P3 NOTES/FS2/G/CS3/DS/F/G/C4/D/E/FS/R/D/E/FS/R/CS/B3/BF/AF/F/G/AF/G; 00500 D/CS/A2/B/C3/F/BF/FINE*; 00600 P4 1 200 2000; 00700 P5 FUNC/1/2*; 00800 END; 00900 RUN;